﻿Public Class frmCadUsuario
    Dim bll As New BLL.BLLUsuarios

    Private Sub frmCadUsuario_FormClosed(ByVal sender As Object, ByVal e As System.Windows.Forms.FormClosedEventArgs) Handles Me.FormClosed

        Me.Dispose()

    End Sub
    Private Sub frmCadUsuario_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load

        DataGridView1.DataSource = bll.TabelaUsuarios

    End Sub
End Class